home *** CD-ROM | disk | FTP | other *** search
/ Chip 1997 March / CHIP Mart 1997.iso / SurfCam / SURFCAM.Z / GE2000.M3 < prev    next >
Encoding:
Text File  |  1996-04-01  |  3.5 KB  |  127 lines
  1. name GE 2000
  2.  
  3. % 00
  4. N >4
  5. G 2
  6. X -3.>4
  7. Y -3.>4
  8. R -3.>4
  9. Z -3.>4
  10. H -3.>4
  11. I -3.>4
  12. J -3.>4
  13. Q -3.>4
  14. P -3.>4
  15. F 3.>2
  16. K -3.>4
  17. D 2
  18. S 2
  19. T 2
  20. M 2
  21. s >5
  22. t >5 ,
  23. u 00
  24.  
  25. ModalGs 0 1 2 3 73 74 76 80 81 82 83 84 85  # List of g codes that are modal    
  26.  
  27. Sequence#s N 1 5 5                    # Char, freq, incr & start          
  28.  
  29. HCode X                               # X or X U  'Horizontal char.       
  30. VCode Y                               # Y or Y V  'Vertical char.         
  31. Dcode Z                               # Depth char.                       
  32. FeedCode F                            # Feed rate char.                   
  33.  
  34. Comment ( )                           # Begin End comment char.           
  35.  
  36. Spaces? Y                             # Y or N  'Spaces between words     
  37.  
  38. Spindle 3 4 5                         # Cw, ccw & stop m codes            
  39. Coolant 8 9 7                         # On, Off & Mist m codes            
  40. DComp 41 42 40                        # Left, Right & Cancel m codes      
  41. LComp 43 49                           # On & Off codes                    
  42. Feed G1                             # Linear move                       
  43. Rapid G0                            # Rapid positioning word            
  44.  
  45. Inc/Abs G 91 90                       # Inc & Abs char. & values          
  46.  
  47. Work G                                # Work offset register              
  48.  
  49. Cw G2                               # Circular move clockwise           
  50. Ccw G3                              # Circular move counter clockwise   
  51.  
  52. Incremental? N                        # Y or N  'Inc or abs output        
  53. CtrIncremental? Y                     # Y or N  'Inc or abs I & J         
  54. ByQuadrants? Y                        # Y or N  'Break arcs at quadrants  
  55. CtrCode I J                           # I J or R or I J K L               
  56. Helical? N
  57.  
  58. UppercaseComments? Y                  # Y or N 'Require uppercase comments
  59.  
  60. Drill                                 # Drilling canned/manual cycle      
  61. G81 X[H] Y[V] Z[D] R[Vclear] F[FRate]
  62. end cancel
  63.  
  64. Peck                                  # Pecking canned/manual cycle       
  65. G83 X[H] Y[V] Z[D] Q[VBite] R[Vclear] F[FRate]
  66. end cancel
  67.  
  68. Tap                                   # Tapping canned/manual cycle       
  69. G84 X[H] Y[V] Z[D] R[Vclear] F[FRate]
  70. end cancel
  71.  
  72. Ream                                  # Reaming canned/manual cycle       
  73. G85 X[H] Y[V] Z[D] R[Vclear] F[FRate]
  74. end cancel
  75.  
  76. Bore                                  # Boring canned/manual cycle        
  77. G86 X[H] Y[V] Z[D] R[Vclear] F[FRate]
  78. end cancel
  79.  
  80. Back                                  # Back boring canned/manual cycle   
  81. G87 X[H] Y[V] Z[D] R[Vclear] F[FRate]
  82. end cancel
  83.  
  84. Cancel                                # Cancel a canned/manual cycle      
  85. G80
  86. end
  87.  
  88. StartCode                             # Start of the program              
  89. s[Program#] t[Program#] u0
  90. G90 G17
  91. End
  92.  
  93. 1stToolChange                         # First tool change                 
  94. G90 S[Speed] M[Direct]
  95. T[Tool] M6
  96. G0 X[H] Y[V]
  97. Z[D]
  98. End
  99.  
  100. Infeed                                # Enable cutter comp                
  101. G[Side] X[H] Y[V] F[FRate]
  102. end
  103.  
  104. Outfeed                               # Disable cutter comp               
  105. G40 X[H] Y[V]
  106. end
  107.  
  108. ToolChange                            # Secondary tool changes            
  109. M1
  110. G49 Z0 M5
  111. T[Tool]
  112. M6 S[Speed]
  113. G0 X[H] Y[V]
  114. G43 Z[D] H[Lcomp]
  115. M[cool]
  116. End
  117.  
  118. EndCode                               # End of the program                
  119. M9
  120. G49 Z0 M5
  121. G0 X0 Y0
  122. M30
  123. End
  124.  
  125. Replace "s" with "(ID,PROG,"
  126. Replace "u" with ",0)"
  127.